R Notebook

library

install.packages("ggridges")

also installing the dependency ‘plyr’

trying URL 'https://cran.rstudio.com/bin/macosx/contrib/4.0/plyr_1.8.6.tgz'
Content type 'application/x-gzip' length 1012642 bytes (988 KB)
==================================================
downloaded 988 KB

trying URL 'https://cran.rstudio.com/bin/macosx/contrib/4.0/ggridges_0.5.2.tgz'
Content type 'application/x-gzip' length 2308196 bytes (2.2 MB)
==================================================
downloaded 2.2 MB

The downloaded binary packages are in
    /var/folders/7y/mk_mzkbx4dvbx96jx9g9tbqm0000gn/T//RtmpYltOzh/downloaded_packages

data import

data_raw <- read_tsv("input2/data.csv")

Parsed with column specification:
cols(
  .default = col_double(),
  country = col_character()
)
See spec(...) for full column specifications.

inspect

age

age 999999 was possible so omitting ppl with age > 100 (some typed like 1992…)

most participants answered 1=male or 2=female. 0=missing, 3=other.

df <- data %>%  #19,719
  filter(age < 100) %>% 
  filter(gender %in% c(1, 2)) %>%  # 19,514
  mutate(gender = recode(gender, 1 = "Male", 2 = "Female")) %>% 

Error: unexpected '=' in:
"  filter(gender %in% c(1, 2)) %>%  # 19,514
  mutate(gender = recode(gender, 1 ="

country

plot

agreeableness

stability